home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1996 February
/
EnigmA AMIGA RUN 04 (1996)(G.R. Edizioni)(IT)[!][issue 1996-02][Skylink CD III].iso
/
earcd
/
comm2
/
termsorc.lha
/
Extras
/
Source
/
term-source.lha
/
TrapPanel.c
< prev
next >
Wrap
C/C++ Source or Header
|
1995-09-28
|
21KB
|
898 lines
/*
** TrapPanel.c
**
** Editing panel for trap list
**
** Copyright © 1990-1995 by Olaf `Olsen' Barthel
** All Rights Reserved
*/
#include "termGlobal.h"
enum { GAD_LIST,GAD_SEQUENCE,GAD_COMMAND,
GAD_TOP,GAD_UP,GAD_DOWN,GAD_END,
GAD_NEW,GAD_REMOVE,GAD_CLEAR,
GAD_LOAD,GAD_SAVE,GAD_USE,GAD_CLOSE
};
VOID
TrapPanel()
{
struct LayoutHandle *Handle;
struct GenericList *TrapList;
struct TrapNode *Node,
*Next;
ObtainSemaphore(&GenericListTable[GLIST_TRAP] -> ListSemaphore);
TrapList = GenericListTable[GLIST_TRAP];
if(Handle = LT_CreateHandleTags(Window -> WScreen,
LH_LocaleHook, &LocaleHook,
TAG_DONE))
{
struct Window *LocalWindow;
struct IBox Bounds;
LT_New(Handle,
LA_Type, VERTICAL_KIND,
TAG_DONE);
{
LT_New(Handle,
LA_Type, VERTICAL_KIND,
LA_LabelID, MSG_TRAPPANEL_TRAP_CONTROLS_TXT,
TAG_DONE);
{
LONG MaxWidth,MaxHeight;
MaxWidth = MaxHeight = 0;
if(TrapList)
{
struct Node *Node;
LONG Len;
for(Node = (struct Node *)TrapList -> ListHeader . mlh_Head ; Node -> ln_Succ ; Node = Node -> ln_Succ)
{
Len = strlen(Node -> ln_Name);
if(Len > MaxWidth)
MaxWidth = Len;
MaxHeight++;
}
}
if(MaxWidth < 30)
MaxWidth = 30;
if(MaxHeight < 10)
MaxHeight = 10;
else
{
if(MaxHeight > 20)
MaxHeight = 20;
}
LT_New(Handle,
LA_Type, LISTVIEW_KIND,
LA_LabelID, MSG_TRAPPANEL_TRAP_LIST_TXT,
LA_LabelPlace, PLACE_LEFT,
LA_Chars, 30,
LA_Lines, 10,
LA_ID, GAD_LIST,
LALV_CursorKey, TRUE,
LALV_MaxGrowX, MaxWidth,
LALV_MaxGrowY, MaxHeight,
LALV_ResizeY, TRUE,
LALV_ResizeX, TRUE,
GTLV_Labels, TrapList,
Kick30 ? LALV_Link : TAG_IGNORE, NIL_LINK,
TAG_DONE);
LT_New(Handle,
LA_Type, STRING_KIND,
LA_LabelID, MSG_TRAPPANEL_SEQUENCE_TXT,
LA_ID, GAD_SEQUENCE,
GTST_MaxChars, 255,
GA_Disabled, TRUE,
TAG_DONE);
LT_New(Handle,
LA_Type, STRING_KIND,
LA_LabelID, MSG_TRAPPANEL_COMMAND_TXT,
LA_ID, GAD_COMMAND,
GTST_MaxChars, 255,
GA_Disabled, TRUE,
TAG_DONE);
LT_EndGroup(Handle);
}
LT_New(Handle,
LA_Type, HORIZONTAL_KIND,
TAG_DONE);
{
LT_New(Handle,
LA_Type, HORIZONTAL_KIND,
LA_LabelID, MSG_V36_0038,
LA_Spread, TRUE,
LA_SameSize, TRUE,
TAG_DONE);
{
LT_New(Handle,
LA_Type, TAPEDECK_KIND,
LATD_ButtonType,TDBT_PREVIOUS,
LATD_Smaller, TRUE,
LA_ID, GAD_TOP,
LA_NoKey, TRUE,
GA_Disabled, TRUE,
TAG_DONE);
LT_New(Handle,
LA_Type, TAPEDECK_KIND,
LATD_ButtonType,TDBT_REWIND,
LATD_Smaller, TRUE,
LA_ID, GAD_UP,
LA_NoKey, TRUE,
GA_Disabled, TRUE,
TAG_DONE);
LT_New(Handle,
LA_Type, TAPEDECK_KIND,
LATD_ButtonType,TDBT_PLAY,
LATD_Smaller, TRUE,
LA_ID, GAD_DOWN,
LA_NoKey, TRUE,
GA_Disabled, TRUE,
TAG_DONE);
LT_New(Handle,
LA_Type, TAPEDECK_KIND,
LATD_ButtonType,TDBT_NEXT,
LATD_Smaller, TRUE,
LA_ID, GAD_END,
LA_NoKey, TRUE,
GA_Disabled, TRUE,
TAG_DONE);
LT_EndGroup(Handle);
}
LT_New(Handle,
LA_Type, HORIZONTAL_KIND,
LA_LabelID, MSG_V36_0043,
LA_Spread, TRUE,
LA_SameSize, TRUE,
TAG_DONE);
{
LT_New(Handle,
LA_Type, BUTTON_KIND,
LA_LabelID, MSG_FASTMACROPANEL_NEW_GAD,
LA_ID, GAD_NEW,
TAG_DONE);
LT_New(Handle,
LA_Type, BUTTON_KIND,
LA_LabelID, MSG_GLOBAL_REMOVE_GAD,
LA_ID, GAD_REMOVE,
GA_Disabled, TRUE,
TAG_DONE);
LT_New(Handle,
LA_Type, BUTTON_KIND,
LA_LabelID, MSG_UPLOADQUEUE_CLEAR_TXT,
LA_ID, GAD_CLEAR,
GA_Disabled, TrapList -> ListHeader . mlh_Head -> mln_Succ == NULL,
TAG_DONE);
LT_EndGroup(Handle);
}
LT_EndGroup(Handle);
}
LT_New(Handle,
LA_Type, VERTICAL_KIND,
TAG_DONE);
{
LT_New(Handle,LA_Type,XBAR_KIND,LAXB_FullSize,TRUE,TAG_DONE);
LT_EndGroup(Handle);
}
LT_New(Handle,LA_Type,HORIZONTAL_KIND,
LAGR_SameSize, TRUE,
LAGR_Spread, TRUE,
LA_ExtraSpace, TRUE,
TAG_DONE);
{
LT_New(Handle,
LA_Type, BUTTON_KIND,
LA_LabelID, MSG_GLOBAL_USE_GAD,
LA_ID, GAD_USE,
LABT_ReturnKey, TRUE,
LABT_ExtraFat, TRUE,
TAG_DONE);
LT_New(Handle,
LA_Type, BUTTON_KIND,
LA_LabelID, MSG_GLOBAL_LOAD_GAD,
LA_ID, GAD_LOAD,
LABT_ExtraFat, TRUE,
TAG_DONE);
LT_New(Handle,
LA_Type, BUTTON_KIND,
LA_LabelID, MSG_GLOBAL_SAVE_GAD,
LA_ID, GAD_SAVE,
LABT_ExtraFat, TRUE,
GA_Disabled, TrapList -> ListHeader . mlh_Head -> mln_Succ == NULL,
TAG_DONE);
LT_New(Handle,
LA_Type, BUTTON_KIND,
LA_LabelID, MSG_GLOBAL_CLOSE_TXT,
LA_ID, GAD_CLOSE,
LABT_EscKey, TRUE,
LABT_ExtraFat, TRUE,
TAG_DONE);
LT_EndGroup(Handle);
}
LT_EndGroup(Handle);
}
if(Screen && Window)
{
Bounds . Left = Window -> LeftEdge;
Bounds . Top = Window -> TopEdge;
Bounds . Width = Window -> Width;
Bounds . Height = Window -> Height;
}
if(LocalWindow = LT_Build(Handle,
LAWN_TitleID, MSG_TRAPPANEL_TRAP_PREFERENCES_TXT,
LAWN_IDCMP, IDCMP_CLOSEWINDOW,
LAWN_HelpHook, &GuideHook,
LAWN_Parent, Window,
WA_DepthGadget, TRUE,
WA_CloseGadget, TRUE,
WA_DragBar, TRUE,
WA_RMBTrap, TRUE,
WA_Activate, TRUE,
WA_SimpleRefresh, TRUE,
Screen ? LAWN_Bounds : TAG_IGNORE, &Bounds,
TAG_DONE))
{
struct IntuiMessage *Message;
BOOLEAN Done = FALSE;
ULONG MsgClass;
UWORD MsgCode;
struct Gadget *MsgGadget;
struct TrapNode *Selected = NULL;
ULONG Offset = 0;
UBYTE DummyBuffer[MAX_FILENAME_LENGTH],
*DummyChar;
struct FileRequester *FileRequest;
GuideContext(CONTEXT_TRAPS);
PushWindow(LocalWindow);
do
{
if(Wait(PORTMASK(LocalWindow -> UserPort) | SIG_BREAK) & SIG_BREAK)
break;
while(Message = (struct IntuiMessage *)LT_GetIMsg(Handle))
{
MsgClass = Message -> Class;
MsgCode = Message -> Code;
MsgGadget = (struct Gadget *)Message -> IAddress;
LT_ReplyIMsg(Message);
if(MsgClass == IDCMP_CLOSEWINDOW)
Done = TRUE;
if(MsgClass == IDCMP_GADGETUP)
{
switch(MsgGadget -> GadgetID)
{
case GAD_CLOSE:
case GAD_USE:
Done = TRUE;
break;
case GAD_TOP:
LT_SetAttributes(Handle,GAD_LIST,
GTLV_Labels, ~0,
TAG_DONE);
Remove((struct Node *)Selected);
AddHead((struct List *)TrapList,(struct Node *)Selected);
Offset = 0;
LT_SetAttributes(Handle,GAD_LIST,
GTLV_Labels, TrapList,
GTLV_Selected, Offset,
GTLV_Top, Offset,
TAG_DONE);
LT_SetAttributes(Handle,GAD_TOP,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_UP,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_DOWN,
GA_Disabled, !Selected -> Node . ln_Succ -> ln_Succ,
TAG_DONE);
LT_SetAttributes(Handle,GAD_END,
GA_Disabled, !Selected -> Node . ln_Succ -> ln_Succ,
TAG_DONE);
TrapsChanged = TRUE;
break;
case GAD_UP:
LT_SetAttributes(Handle,GAD_LIST,
GTLV_Labels, ~0,
TAG_DONE);
Node = (struct TrapNode *)Selected -> Node . ln_Pred -> ln_Pred;
Remove((struct Node *)Selected);
Insert((struct List *)TrapList,(struct Node *)Selected,(struct Node *)Node);
Offset--;
LT_SetAttributes(Handle,GAD_LIST,
GTLV_Labels, TrapList,
GTLV_Selected, Offset,
GTLV_Top, Offset,
TAG_DONE);
LT_SetAttributes(Handle,GAD_TOP,
GA_Disabled, !Selected -> Node . ln_Pred -> ln_Pred,
TAG_DONE);
LT_SetAttributes(Handle,GAD_UP,
GA_Disabled, !Selected -> Node . ln_Pred -> ln_Pred,
TAG_DONE);
LT_SetAttributes(Handle,GAD_DOWN,
GA_Disabled, !Selected -> Node . ln_Succ -> ln_Succ,
TAG_DONE);
LT_SetAttributes(Handle,GAD_END,
GA_Disabled, !Selected -> Node . ln_Succ -> ln_Succ,
TAG_DONE);
TrapsChanged = TRUE;
break;
case GAD_DOWN:
LT_SetAttributes(Handle,GAD_LIST,
GTLV_Labels, ~0,
TAG_DONE);
Node = (struct TrapNode *)Selected -> Node . ln_Succ;
Remove((struct Node *)Selected);
Insert((struct List *)TrapList,(struct Node *)Selected,(struct Node *)Node);
Offset++;
LT_SetAttributes(Handle,GAD_LIST,
GTLV_Labels, TrapList,
GTLV_Selected, Offset,
GTLV_Top, Offset,
TAG_DONE);
LT_SetAttributes(Handle,GAD_TOP,
GA_Disabled, !Selected -> Node . ln_Pred -> ln_Pred,
TAG_DONE);
LT_SetAttributes(Handle,GAD_UP,
GA_Disabled, !Selected -> Node . ln_Pred -> ln_Pred,
TAG_DONE);
LT_SetAttributes(Handle,GAD_DOWN,
GA_Disabled, !Selected -> Node . ln_Succ -> ln_Succ,
TAG_DONE);
LT_SetAttributes(Handle,GAD_END,
GA_Disabled, !Selected -> Node . ln_Succ -> ln_Succ,
TAG_DONE);
TrapsChanged = TRUE;
break;
case GAD_END:
LT_SetAttributes(Handle,GAD_LIST,
GTLV_Labels, ~0,
TAG_DONE);
Remove((struct Node *)Selected);
AddTail((struct List *)TrapList,(struct Node *)Selected);
Offset = TrapList -> ListCount - 1;
LT_SetAttributes(Handle,GAD_LIST,
GTLV_Labels, TrapList,
GTLV_Selected, Offset,
GTLV_Top, Offset,
TAG_DONE);
LT_SetAttributes(Handle,GAD_TOP,
GA_Disabled, !Selected -> Node . ln_Pred -> ln_Pred,
TAG_DONE);
LT_SetAttributes(Handle,GAD_UP,
GA_Disabled, !Selected -> Node . ln_Pred -> ln_Pred,
TAG_DONE);
LT_SetAttributes(Handle,GAD_DOWN,
GA_Disabled, !Selected -> Node . ln_Succ -> ln_Succ,
TAG_DONE);
LT_SetAttributes(Handle,GAD_END,
GA_Disabled, !Selected -> Node . ln_Succ -> ln_Succ,
TAG_DONE);
TrapsChanged = TRUE;
break;
case GAD_NEW:
if(Node = CreateTrapNode("",""))
{
LT_SetAttributes(Handle,GAD_LIST,
GTLV_Labels, ~0,
TAG_DONE);
AddTail((struct List *)TrapList,(struct Node *)Node);
LT_SetAttributes(Handle,GAD_LIST,
GTLV_Labels, TrapList,
GTLV_Selected, TrapList -> ListCount++,
TAG_DONE);
LT_SetAttributes(Handle,GAD_COMMAND,
GTST_String, "",
GA_Disabled, FALSE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_SEQUENCE,
GTST_String, "",
GA_Disabled, FALSE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_REMOVE,
GA_Disabled, FALSE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_SAVE,
GA_Disabled, FALSE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_CLEAR,
GA_Disabled, FALSE,
TAG_DONE);
Selected = Node;
Offset = MsgCode;
LT_SetAttributes(Handle,GAD_TOP,
GA_Disabled, !Selected -> Node . ln_Pred -> ln_Pred,
TAG_DONE);
LT_SetAttributes(Handle,GAD_UP,
GA_Disabled, !Selected -> Node . ln_Pred -> ln_Pred,
TAG_DONE);
LT_SetAttributes(Handle,GAD_DOWN,
GA_Disabled, !Selected -> Node . ln_Succ -> ln_Succ,
TAG_DONE);
LT_SetAttributes(Handle,GAD_END,
GA_Disabled, !Selected -> Node . ln_Succ -> ln_Succ,
TAG_DONE);
LT_Activate(Handle,GAD_SEQUENCE);
TrapsChanged = TRUE;
}
else
DisplayBeep(LocalWindow -> WScreen);
break;
case GAD_CLEAR:
LT_SetAttributes(Handle,GAD_LIST,
GTLV_Labels, ~0,
TAG_DONE);
FreeList((struct List *)TrapList);
TrapList -> ListCount = 0;
LT_SetAttributes(Handle,GAD_LIST,
GTLV_Labels, TrapList,
GTLV_Selected, ~0,
TAG_DONE);
Selected = NULL;
LT_SetAttributes(Handle,GAD_TOP,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_UP,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_DOWN,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_END,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_REMOVE,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_SEQUENCE,
GTST_String, "",
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_COMMAND,
GTST_String, "",
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_SAVE,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_CLEAR,
GA_Disabled, TRUE,
TAG_DONE);
TrapsChanged = FALSE;
break;
case GAD_REMOVE:
if(Selected)
{
LT_SetAttributes(Handle,GAD_LIST,
GTLV_Labels, ~0,
TAG_DONE);
if(--TrapList -> ListCount)
{
if(Selected -> Node . ln_Succ -> ln_Succ)
Node = (struct TrapNode *)Selected -> Node . ln_Succ;
else
{
Node = (struct TrapNode *)Selected -> Node . ln_Pred;
Offset = 0;
}
}
FreeNode((struct Node *)Selected);
LT_SetAttributes(Handle,GAD_LIST,
GTLV_Labels, TrapList,
GTLV_Selected, Node -> Node . ln_Succ ? GetNodeOffset((struct Node *)Node,(struct List *)TrapList) : ~0,
TAG_DONE);
if(!TrapList -> ListCount)
{
Selected = NULL;
LT_SetAttributes(Handle,GAD_TOP,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_UP,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_DOWN,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_END,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_REMOVE,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_SEQUENCE,
GTST_String, "",
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_COMMAND,
GTST_String, "",
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_SAVE,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_CLEAR,
GA_Disabled, TRUE,
TAG_DONE);
}
else
{
Selected = Node;
LT_SetAttributes(Handle,GAD_COMMAND,
GTST_String, Selected -> Command,
TAG_DONE);
LT_SetAttributes(Handle,GAD_SEQUENCE,
GTST_String, Selected -> Node . ln_Name,
TAG_DONE);
LT_SetAttributes(Handle,GAD_TOP,
GA_Disabled, !Selected -> Node . ln_Pred -> ln_Pred,
TAG_DONE);
LT_SetAttributes(Handle,GAD_UP,
GA_Disabled, !Selected -> Node . ln_Pred -> ln_Pred,
TAG_DONE);
LT_SetAttributes(Handle,GAD_DOWN,
GA_Disabled, !Selected -> Node . ln_Succ -> ln_Succ,
TAG_DONE);
LT_SetAttributes(Handle,GAD_END,
GA_Disabled, !Selected -> Node . ln_Succ -> ln_Succ,
TAG_DONE);
}
TrapsChanged = TRUE;
}
break;
case GAD_LIST:
if(Selected = (struct TrapNode *)GetListNode(MsgCode,(struct List *)TrapList))
{
Offset = MsgCode;
LT_SetAttributes(Handle,GAD_SEQUENCE,
GTST_String, Selected -> Node . ln_Name,
GA_Disabled, FALSE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_COMMAND,
GTST_String, Selected -> Command,
GA_Disabled, FALSE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_REMOVE,
GA_Disabled, FALSE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_TOP,
GA_Disabled, !Selected -> Node . ln_Pred -> ln_Pred,
TAG_DONE);
LT_SetAttributes(Handle,GAD_UP,
GA_Disabled, !Selected -> Node . ln_Pred -> ln_Pred,
TAG_DONE);
LT_SetAttributes(Handle,GAD_DOWN,
GA_Disabled, !Selected -> Node . ln_Succ -> ln_Succ,
TAG_DONE);
LT_SetAttributes(Handle,GAD_END,
GA_Disabled, !Selected -> Node . ln_Succ -> ln_Succ,
TAG_DONE);
}
break;
case GAD_SEQUENCE:
if(Selected)
{
LT_SetAttributes(Handle,GAD_LIST,
GTLV_Labels, ~0,
TAG_DONE);
Selected = ChangeTrapNode(TrapList,Selected,(STRPTR)LT_GetAttributes(Handle,GAD_SEQUENCE,TAG_DONE),NULL);
LT_SetAttributes(Handle,GAD_LIST,
GTLV_Labels, TrapList,
GTLV_Selected, GetNodeOffset((struct Node *)Selected,(struct List *)TrapList),
TAG_DONE);
LT_SetAttributes(Handle,GAD_COMMAND,
GTST_String, Selected -> Command,
TAG_DONE);
LT_SetAttributes(Handle,GAD_SEQUENCE,
GTST_String, Selected -> Node . ln_Name,
TAG_DONE);
TrapsChanged = TRUE;
LT_Activate(Handle,GAD_COMMAND);
}
break;
case GAD_COMMAND:
if(Selected)
{
Selected = ChangeTrapNode(TrapList,Selected,NULL,(STRPTR)LT_GetAttributes(Handle,GAD_COMMAND,TAG_DONE));
TrapsChanged = TRUE;
}
break;
case GAD_LOAD:
SplitFileName(LastTraps,&DummyChar,DummyBuffer);
LT_LockWindow(LocalWindow);
if(FileRequest = GetFile(LocalWindow,LocaleString(MSG_TRAPPANEL_LOAD_TRAP_SETTINGS_TXT),DummyBuffer,FilePart(LastTraps),DummyBuffer,"#?.prefs",FALSE,FALSE,FALSE,LocaleString(MSG_GLOBAL_LOAD_TXT),TRUE))
{
LT_SetAttributes(Handle,GAD_LIST,
GTLV_Labels, ~0,
TAG_DONE);
Selected = NULL;
if(!LoadTraps(DummyBuffer,TrapList))
ShowError(LocalWindow,ERR_LOAD_ERROR,IoErr(),DummyBuffer);
else
{
strcpy(LastTraps,DummyBuffer);
TrapsChanged = FALSE;
}
LT_SetAttributes(Handle,GAD_LIST,
GTLV_Labels, TrapList,
TAG_DONE);
LT_SetAttributes(Handle,GAD_COMMAND,
GTST_String, "",
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_SEQUENCE,
GTST_String, "",
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_REMOVE,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_TOP,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_UP,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_DOWN,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_END,
GA_Disabled, TRUE,
TAG_DONE);
LT_SetAttributes(Handle,GAD_SAVE,
GA_Disabled, !TrapList -> ListCount,
TAG_DONE);
LT_SetAttributes(Handle,GAD_CLEAR,
GA_Disabled, !TrapList -> ListCount,
TAG_DONE);
FreeAslRequest(FileRequest);
}
LT_UnlockWindow(LocalWindow);
break;
case GAD_SAVE:
SplitFileName(LastTraps,&DummyChar,DummyBuffer);
LT_LockWindow(LocalWindow);
if(FileRequest = GetFile(LocalWindow,LocaleString(MSG_TRAPPANEL_SAVE_TRAP_SETTINGS_TXT),DummyBuffer,FilePart(LastTraps),DummyBuffer,"#?.prefs",TRUE,FALSE,FALSE,LocaleString(MSG_GLOBAL_SAVE_TXT),TRUE))
{
if(!SaveTraps(DummyBuffer,(struct List *)TrapList))
ShowError(LocalWindow,ERR_SAVE_ERROR,IoErr(),DummyBuffer);
else
{
strcpy(LastTraps,DummyBuffer);
TrapsChanged = FALSE;
}
FreeAslRequest(FileRequest);
}
LT_UnlockWindow(LocalWindow);
break;
}
}
}
}
while(!Done);
PopWindow();
}
LT_DeleteHandle(Handle);
}
for(Node = (struct TrapNode *)TrapList -> ListHeader . mlh_Head ; Next = (struct TrapNode *)Node -> Node . ln_Succ ; Node = Next)
{
if(!Node -> Node . ln_Name[0] || !Node -> SequenceLen)
{
Remove(Node);
FreeVecPooled(Node);
TrapList -> ListCount--;
}
}
ReleaseSemaphore(&GenericListTable[GLIST_TRAP] -> ListSemaphore);
}